home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue50 / HTML / Demo1A.dfm / Demo1A.txt
Encoding:
Text File  |  1999-08-11  |  2.3 KB  |  107 lines
  1. object frmMain: TfrmMain
  2.   Left = 277
  3.   Top = 106
  4.   Width = 583
  5.   Height = 520
  6.   Caption = 'Demo'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   OldCreateOrder = False
  14.   Position = poScreenCenter
  15.   OnCreate = FormCreate
  16.   PixelsPerInch = 96
  17.   TextHeight = 13
  18.   object Label1: TLabel
  19.     Left = 8
  20.     Top = 9
  21.     Width = 47
  22.     Height = 13
  23.     Caption = 'SML Tag:'
  24.   end
  25.   object PageControl1: TPageControl
  26.     Left = 7
  27.     Top = 151
  28.     Width = 563
  29.     Height = 333
  30.     ActivePage = TabSheet1
  31.     Anchors = [akLeft, akTop, akRight, akBottom]
  32.     TabOrder = 0
  33.     object TabSheet1: TTabSheet
  34.       Caption = 'XML Parsing'
  35.       object btnParse: TButton
  36.         Left = 8
  37.         Top = 10
  38.         Width = 75
  39.         Height = 25
  40.         Caption = 'Parse'
  41.         TabOrder = 0
  42.         OnClick = btnParseClick
  43.       end
  44.       object tvDocument: TTreeView
  45.         Left = 8
  46.         Top = 45
  47.         Width = 538
  48.         Height = 250
  49.         Anchors = [akLeft, akTop, akRight, akBottom]
  50.         Indent = 19
  51.         TabOrder = 1
  52.       end
  53.     end
  54.     object TabSheet2: TTabSheet
  55.       Caption = 'Expand Tags'
  56.       ImageIndex = 1
  57.       object Button1: TButton
  58.         Left = 8
  59.         Top = 10
  60.         Width = 75
  61.         Height = 25
  62.         Caption = 'Expand'
  63.         TabOrder = 0
  64.         OnClick = Button1Click
  65.       end
  66.       object memOutput: TMemo
  67.         Left = 8
  68.         Top = 45
  69.         Width = 538
  70.         Height = 250
  71.         TabOrder = 1
  72.       end
  73.     end
  74.   end
  75.   object memSML: TMemo
  76.     Left = 8
  77.     Top = 25
  78.     Width = 560
  79.     Height = 118
  80.     Anchors = [akLeft, akTop, akRight]
  81.     Font.Charset = ANSI_CHARSET
  82.     Font.Color = clWindowText
  83.     Font.Height = -11
  84.     Font.Name = 'Courier New'
  85.     Font.Style = []
  86.     Lines.Strings = (
  87.       '<DATAOBJECT class="TEmployee" name="Emp" oid="4"/>'
  88.       '<CONTROL type="edit" property="Emp.FirstName"/>'
  89.       '<CONTROL type="edit" property="Emp.LastName"/>')
  90.     ParentFont = False
  91.     ScrollBars = ssBoth
  92.     TabOrder = 1
  93.     WordWrap = False
  94.   end
  95.   object dbSample: TDatabase
  96.     AliasName = 'DBDEMOS'
  97.     Connected = True
  98.     DatabaseName = 'Sample'
  99.     LoginPrompt = False
  100.     Params.Strings = (
  101.       '')
  102.     SessionName = 'Default'
  103.     Left = 460
  104.     Top = 5
  105.   end
  106. end
  107.